home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 86xx / 8604.d64 / algorithm. lo_hi (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  113b  |  5 lines

  1. 10 POKE56334,0:POKE1,51
  2. 20 FORI=1024TO2023:BA=53248+PEEK(I)*8
  3. 30 FORJ=0TO7:POKE8192+Z,PEEK(BA+J):Z=Z+1:NEXTJ,I
  4. 40 POKE1,55:POKE56334,1
  5.